home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Format CD 40
/
Amiga Format CD40 (1999-05-11)(Future Publishing)(GB)(Track 1 of 3)[!][issue 1999-06].iso
/
-seriously_amiga-
/
misc
/
pdflib
/
text2pdf.c
< prev
next >
Wrap
C/C++ Source or Header
|
1999-03-24
|
4KB
|
176 lines
/* text2pdf.c
* Copyright (C) 1997-98 Thomas Merz. All rights reserved.
*/
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#ifdef POSIX
#include <unistd.h>
#endif
#ifdef DOS
#include <process.h>
#endif
#ifdef NeXT
#include <libc.h> /* for getopt(), optind, optarg */
#endif
#include "pdf.h"
static void
usage(void)
{
fprintf(stderr, "text2pdf - convert text files to pdf. (C) Thomas Merz 1997-98\n");
fprintf(stderr, "usage: text2pdf [options] [textfile]\n");
fprintf(stderr, "Available options:\n");
fprintf(stderr, "-b binary mode (default: ASCII)\n");
fprintf(stderr, "-f fontname name of font to use\n");
fprintf(stderr, "-h height page height in points\n");
fprintf(stderr, "-m margin margin size in points\n");
fprintf(stderr, "-s size font size\n");
fprintf(stderr, "-o filename PDF output file name\n");
fprintf(stderr, "-w width page width in points\n");
fprintf(stderr, "-I path path to AFM and font directory\n");
exit(1);
}
#define BUFLEN 512
void
main(int argc, char *argv[])
{
PDF_info *info;
char buf[BUFLEN], *s;
FILE *pdffile = NULL, *textfile = stdin;
PDF *p;
int opt;
char *fontname;
float fontsize;
float x, y, width = a4.width, height = a4.height, margin = 20;
info = PDF_get_info();
info->Title = "stdin";
info->Creator = "text2pdf";
info->binary_mode = false;
fontname = "Courier";
fontsize = 12.0;
while ((opt = getopt(argc, argv, "bf:h:m:o:s:w:I:")) != -1)
switch (opt) {
case 'b':
info->binary_mode = true;
break;
case 'f':
fontname = optarg;
break;
case 'h':
height = atoi(optarg);
if (height < 0) {
fprintf(stderr, "Error: bad page height %f!\n", height);
usage();
}
break;
case 'm':
margin = atoi(optarg);
if (margin < 0) {
fprintf(stderr, "Error: bad margin %f!\n", margin);
usage();
}
break;
case 'o':
pdffile = fopen(optarg, WRITEMODE);
if (pdffile == NULL) {
fprintf(stderr,
"Error: cannot open output file %s.\n", optarg);
usage();
}
break;
case 's':
fontsize = atoi(optarg);
if (fontsize < 0) {
fprintf(stderr, "Error: bad font size %f!\n", fontsize);
usage();
}
break;
case 'w':
width = atoi(optarg);
if (width < 0) {
fprintf(stderr, "Error: bad page width %f!\n", width);
usage();
}
break;
case 'I':
info->fontpath = optarg;
break;
case '?':
default:
usage();
}
if (pdffile == (FILE *) NULL)
usage();
if (optind < argc) {
info->Title = argv[optind];
if ((textfile = fopen(argv[optind], "r")) == NULL) {
fprintf(stderr, "Error: cannot open input file %s.\n",argv[optind]);
exit(2);
}
} else
textfile = stdin;
p = PDF_open(pdffile, info);
x = margin;
y = height - margin;
while ((s = fgets(buf, BUFLEN, textfile)) != NULL) {
if (s[0] == '\f') {
if (y == height - margin)
PDF_begin_page(p, width, height);
PDF_end_page(p);
y = height - margin;
continue;
}
if (s[0] != '\0' && s[strlen(s) - 1] == '\n')
s[strlen(s) - 1] = '\0'; /* remove newline character */
if (y < margin) { /* page break necessary? */
y = height - margin;
PDF_end_page(p);
}
if (y == height - margin) {
PDF_begin_page(p, width, height);
PDF_set_font(p, fontname, fontsize, winansi);
PDF_set_text_pos(p, x, y);
y -= fontsize;
}
PDF_continue_text(p, s);
y -= fontsize;
}
if (y != height - margin)
PDF_end_page(p);
PDF_close(p);
exit(0);
}